setGlobalDuration(10)

pinkNoise(amplitude=1, out='noise')

expsegr(bus='fvar', i1=1, dur1=10, i2=.05)
bandpass(input='noise', cutoff=5000, bandwidth=500, cutoffVar='fvar', bandwidthVar='fvar')

startCsound()